|
Inventor VBA : Automatische Spannungsberechnung
Kon am 29.02.2008 um 11:12 Uhr (0)
Hallo,ich muss ein Makro schreiben, welches mir für ein Bauteil eine Datei mit Geometrieparametern (Länge, Höhe, Breite, ...) einliest, die Bauteilgeometrie aktualisiert und dann Spannung und Verformung berechnet. Da ich erst seit zwei Tagen mit Inventor (Inventor 2008) arbeite und es leider keinen Makro-Rekorder gibt (warum eigentlich nicht), fällt mir vorallem der letzte Part schwer. Das Einlesen der Parameter und das Aktualisieren der Bauteilgeometrie funktioniert bereits. Weiterhin habe ich Material, L ...
|
In das Form Inventor VBA wechseln |
|
INVENTOR VBA : winkel bemaßung ändern und workplanes
PaulSchuepbach am 16.12.2003 um 15:14 Uhr (0)
Hallo Basti, der code von Deiner letzten Frage etwas erweitert: Public Sub AddAngleConstraint() Dim oApp As Application Set oApp = ThisApplication Dim oDoc As PartDocument Set oDoc = oApp.ActiveDocument Dim oSketch As PlanarSketch Set oSketch = oDoc.ActivatedObject Dim oLine1 As SketchLine Dim oLine2 As SketchLine Set oLine1 = oSketch.SketchLines.Item(1) Set oLine2 = oSketch.SketchLines.Item(2) Dim oTG As TransientGeometry Set oTG = oApp.TransientGeometry Dim oPt2D ...
|
In das Form INVENTOR VBA wechseln |
|
INVENTOR VBA : Zugriff auf Parameter über VBA
yamaha am 06.07.2004 um 18:40 Uhr (0)
Hallo Oli, nachfolgend aus der Inventor Hilfe Das Beispiel setz voraus das du dich in einem Part-Dokument befindest ------------------------------------------------------------------ This sample demonstrates the methods and properties supported by the Parameters object for model parameters. To run the sample you must have an part document open that contains at least one parameter, one of which is named d0. Public Sub ModelParameters() Obtain the active document, this assumes that a part docum ...
|
In das Form INVENTOR VBA wechseln |
|
INVENTOR VBA : Parameter ändern, aber auf welchem Weg?
yamaha am 09.09.2004 um 11:02 Uhr (0)
Hallo Roland, nachfolgend ein Beispiel aus der VBA Hilfe, allerdings aus INV8. Ich weiß nicht genau ob dies in Version 7 auch schon möglich ist. This sample demonstrates the methods and properties supported by the Parameters object for model parameters. To run the sample you must have an part document open that contains at least one parameter, one of which is named d0. Public Sub ModelParameters() Obtain the active document, this assumes that a part document is active in Inventor. Dim oPa ...
|
In das Form INVENTOR VBA wechseln |
|
INVENTOR VBA : Arbeiten mit Parameter
VOSTA1 am 08.07.2005 um 12:47 Uhr (0)
Hallo, 1. Erzeuge eine neue *.ipt mit einem einfachen Teil und bemaße es. Es müßte dann in der "fx" Tabelle d0 , d1 usw. stehen starte dieses Makro Sub Parameter_Name_neu() Dim opartDoc As Inventor.PartDocument Set opartDoc = ThisApplication.ActiveDocument Dim oParams As Parameters Set oParams = opartDoc.ComponentDefinition.Parameters opartDoc.ComponentDefinition.Parameters.Item("d0").Name = "Name_neu" hiermit kannst Du die Veränderungen sichtbar machen opartDoc.Update opartDoc.DocumentEvents.Applicati ...
|
In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Aktualisierung der Eigenschaft Masse
rtend12 am 04.12.2007 um 21:30 Uhr (0)
Hallo Manfred,die Abfrage "requiresupdate" ist drin, weil es sein kann, dass das Dokument ein Update erfordert bevor die Masse berechnet wird, z.B. bei Baugruppen oder Abgeleiteten Komponenten.Kann aber auch bei normalen Parts vorkommen.Versuch mal folgendes:- modelliere irgendwas- aktualisiere die Masse- ändere einen Parameter über die Paramterliste- jetzt ist der Blitz aktiv und requiresupdate=trueDie Routine steht bei mir in einem Klassenmodul, das beim Speichern aufgerufen wird. Dadurch habe ich immer ...
|
In das Form Inventor VBA wechseln |
|
Inventor VBA : Parameterübergabe an VB
PaulSchuepbach am 17.03.2011 um 14:36 Uhr (0)
Hallo Erik,die Fehlermeldung sagts ja bereits: Dein oPara ist ein PARAMETER und nicht der WERT des Parameters. Um einen Wert zuzuweisen musst Du auf .Value gehen, also:oPara.Value = oPara.Value + 2Ich vermute mal, dass Du irgendwas um irgendwas in 2° Schritten drehen willst ? Beachte folgendes:- Inventor arbeitet intern mit cm als Länegneinheiten- Inventor arbeitet intern mit Radianten als Winkeleinheiten, Du muss also dann Deinen Wert in Grad umrechnen mit / 180 * PIGenerell zu Deinem Code:Do While Not za ...
|
In das Form Inventor VBA wechseln |
|
Inventor VBA : Inventor über Excel vba aktualisieren
mssoftware am 11.02.2011 um 09:31 Uhr (0)
Hallo,ich kenne lediglich die Funktion, Inventor Dateien mit einer Excel Liste zu verknüpfen und dann Parameter einzulesen, um die Modelle dadurch zu steuern. Da brauch man aber kein VBA für, um das Modell zu aktualisieren. Wenn man die Exceldatei speichert und im Inventor auf aktualisieren klickt, dann passiert das automatisch... oder suchst du nur den API Befehl: "oInventorApp.ActiveDocument.Update()"Was genau willst du denn machen?Gruß Maik[Diese Nachricht wurde von mssoftware am 11. Feb. 2011 editiert.]
|
In das Form Inventor VBA wechseln |
|
Inventor VBA : Parameterübergabe an VB
Exodus2012 am 17.03.2011 um 13:54 Uhr (0)
Hallo,ich hab folgendes Problem:Ich will aus einer Baugruppe einen Parameter ("Winkel") in VB importieren:Dim oPara As Inventor.ParameteroPara = oDoc.ComponentDefinition.Parameters.Item("Winkel")und diesen Parameter dann in einer Schleife aufaddieren:Do While Not zaehler = 180 oPara = oPara + 2 zaehler = zaehler + 1 oDoc.Update() oApp.ActiveView.Update() If zaehler = 180 Then Exit DoLoopJetzt hab ich an der markierten Stelle folgenden Fehler: "Der +-Operator ist für d ...
|
In das Form Inventor VBA wechseln |
 |
Inventor VBA : Benutzer Parameter - I-Properties
Goose am 20.07.2017 um 14:29 Uhr (15)
Hallo zusammen,ich möchte innerhalb einer .iam die Benutzerparameter von Inhaltscenter Bauteilen an diei-Properties der Bauteile übergeben.Das klappt soweit ganz gut.Beim Anlegen des i-Properties “Abmessungen“ wo die Formel hinterlegt ist um die Abmaße der Bauteile wiederzugeben schaffe ich es nicht auf die Bauteil- Ebene zuzugreifen.Das i-Propertie wir auf der Baugruppen- Ebene abgelegt.Könnte mir da jemand sagen wo ich den Fehler habe.Danke und GrußSub Export()Dim oApp As ApplicationSet oApp = ThisApplic ...
|
In das Form Inventor VBA wechseln |
|
Inventor VBA : iLogic bauteil aktualsieren
rkauskh am 16.02.2024 um 13:43 Uhr (1)
MoinMöglichkeit 1Die Änderungen in Regel1 und den Export in Regel2 packen. Eine übergeordnete Regel erstellen und nacheinander die beiden anderen Regeln mit RunRule ausführen. Das Document.Update dann entsprechend an den Anfang der zweiten Regel.Möglichkeit 2:Parameter.Param verwendenCode:Parameter.UpdateAfterChange = TrueDim dHoehe As Double = 7.5Parameter.Param("Hoehe") = dHoeheMöglichkeit 3:Den "alten" Weg benutzen.Code:Dim oPartDoc As PartDocument = ThisDoc.DocumentDim dHoehe As Double = 7.5Dim pHoehe ...
|
In das Form Inventor VBA wechseln |